home *** CD-ROM | disk | FTP | other *** search
Text File | 1990-08-19 | 840 b | 27 lines | [TEXT/CCL ] |
-
- ; This file loads everything necessary to build a "Generalized Lisp" image.
- ; This may be loaded into a fresh Common Lisp image or into another program.
- ; Note: this assumes that the standard Common Lisp read-table is in effect.
-
- (let ((*default-pathname-defaults* (pathname "ccl;glisp 1.2:object files:")))
-
- (make-package :glisp)
- (import '(glisp plisp mlisp lisp) :glisp)
- (in-package :glisp)
- (use-package '(:ccl :user) :glisp)
-
- (terpri)
- (princ "Constants...") (load "Constants.lisp")
- (princ "Interpreter...") (load "Interpreter.lisp")
- (princ "Scanner...") (load "Scanner.lisp")
- (princ "Glisp...") (load "Glisp.lisp")
- (princ "Plisp...") (load "Plisp.lisp")
-
- ; (princ "Mlisp...") (load "ccl;glisp 1.2:Mlisp dialect:Mlisp.lisp")
-
- (in-package :user)
- (use-package '(:glisp))
- )
-
- (dumplisp "ccl;Glisp" :compress nil)
-